Tweak Fdirectory_append slightly

* src/fileio.c (Fdirectory_append): Make the xfree condition more
robust.

diff --git a/src/fileio.c b/src/fileio.c
index ddce4723f4277a23a449ec705151947010d42c91..643fc3616896e1cddf8b45d434ff5edcc3191caa 100644 (file)
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -827,11 +827,11 @@ usage: (record DIRECTORY &rest COMPONENTS) */)
       memcpy (p, SSDATA (arg), SBYTES (arg));
       p += SBYTES (arg);
       /* The last element shouldn't have a slash added at the end. */
-      if (i < nargs -1 && !IS_DIRECTORY_SEP (*(p - 1)))
+      if (i < nargs - 1 && !IS_DIRECTORY_SEP (*(p - 1)))
        *p++ = DIRECTORY_SEP;
     }
 
-  if (multibytes != 0 && multibytes != nargs)
+  if (elements != args)
     xfree (elements);
 
   return result;